home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD ROM Paradise Collection 4
/
CD ROM Paradise Collection 4 1995 Nov.iso
/
science
/
sm32a.zip
/
LIBRARY
/
LIM.LI
< prev
next >
Wrap
Text File
|
1993-12-19
|
251b
|
9 lines
# lim(y, x=x0) gives limit of y when x=x0.
# e.g. lim(sin(x)/x, x=0) givs 1
lim(y_, x_) := subs(lim2(y, left(x)), left(x)=right(x))
lim2(a_/b_, x_) := d(a,x)/d(b,x)
lim2(a_*b_, x_) := d(1/a,x)*d(b,x)
lim2(a_^b_, x_) := exp(lim2(b*ln(a), x))